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Single Precision ASCII Decimal to Binary 



TAPES 



ASCII Source; 090-000029 



ABSTRACT 

This routine converts an ASCII character string of decimal 
digits to the single precision binary equivalent of the 
input . 
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1. REQUiagl-!3RTS 

1.1 Memo ry 

IK or larger alterable memory 

1.2 Eaulp F.ent 

NOVA central processor 

1.3 External Subroutines 

A user supplied "get a character" routine (see 
2,2) and possibly a user supplied "put char- 
acter" routine (see 2,1) are required, 

1.4 Other 
None 

2. OPERATING Pi^OCEDlJRE 

2,1 Calling Sequence 

Two entry points to this routine are provided. 
The first is a normal entry, while the second 
is provided for the user who needs an indication 
that a number is requested. The normal entry 
is made by 

JSR .DBIl 
return 

If an indication is needed, entry is made by 

JSR .DBNI 
return 

If this second entry is used, the user must 
provide the address of a routine in location 
41 of page zero that will accept the indica- 
tion. Indication will be an I^SCII "S" (for 
single precision integer) followed by a null 
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character. These two characters are passed 
separately, right adjusted in hC0 (bit 8 = ^) , 
using two successive calls to the user routine. 
The user routine need not sa^/e any registers 
(except ^.C3 if used) • Return should be roade by 
JMP 0,3, 

2.2 Input Format 

Inp\it characters will be requested by calling 
a user "get a character" routine whose address 
must be stored in location 40 of page zero. 
This user routine roust be provided. 

^SCII characters should be returned, right ad- 
justed in AC^ with bit 8 = ^. This routine 
need not save any registers or Carry. Input 
should be in the form; 

S D D . . . D D (break) 

where S represents the sign ("-" or optionally 

"+"), D represents an ASCII decimal digit, and 

"break" is any ASCII character other than a 
digit. 

2.3 Output Form at 

Upon exit, hC0 will contain the ASCII break 
character and ACl v/ill contain the single pre- 
cision, two's complement binary equivalent of 
the inpi^.t , 

2 • 4 Err o r Re t u r n,s 

Kone 

2,5 S tate of Active Registers upon Exit 

AC2 is unchanged, hC0 , ACl, AC 3, and Carry are 
destroyed. 
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2.6 Catitlons to Us er 

^n indefinite stream of decimal digits will be 
accepted as input. However, tlie result will be 

B rood 2*^15 

where B represents the input number. For ex- 
ample, 32769 converts to +1, -32768 converts 
to 0, 96741 converts to 31205. 

3. DISCUSSIOM 

3.1 Algorithms 

The sign is processed (if given) and a flag set 
for later use in determining whether to negate the 
result or not. A character is requested and 
checked for a decimal digit. If not, the routine 
terminates with the character in hC0 as the break. 
Otherwise, the ASCII digit is converted to the 
binary range 

04049 

and is added to a running Horner's sum (initially 
zero) . If Sj_ is the former sum, this procedure 
is 

Si+i -*c^ Sj^ * 10 + D 

For example, if three digits, D(2), D(l), D{0) , 

are retui.ned before a break, the result is 

( D (2) * 10 + D (D) * 10 + D (0). 

3.2 Liraitations and Accuracy 
The result is 

K mod 2**15 
where N represents the decimal input. 
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3.3 Size and Timing 

The routine is 65 (octal) words in length. 
Execution time is approxiraately 

11^ + I * 82,2 Jj seconds 
where I is the number of digits in the input. 
For example, +57 68 requires 

110 + 4 * 82.2 = 438.8 /4 seconds. 

3.4 References 
None 

3.5 Flow Diagram s 
Eone 

4. EXAMPLES MjD APPLICATIONS 

The ASCII source of decimal to binary is provided 
with the NOVA software. If a user routine requires 
this program, this tape should be edited into the 
user source, 

5- PROGimM LISTIBG 

A listing of decimal to binary follows. Ho origin 
is given in the source, enabling the user to edit 
this tape anywhere within his routines. 
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is THZ ;-,:'^^3 D A D"'C;:-^L Die- I': 






^ '^ ^-^^ -.Oj ':^^^!-:^; ' "; /?r:-:;Hs;^ to sigmal characters are 

I r ' ■■'•;::r-'p- C^'^\.-JV:; c-^0-J£Vf:^ !; ;- . 

I RETUR:^ 






I CAUTION I 

I 

J 



"> ^- 



'*-" OR- THE RESULT IS 

' ~ : ir.)r\' VERTS TO +31205 



■! ., -'".x '---:, - r-, 



AC2#AC3 



f f f 



. ■ '^ '.- --1 c> • ,3 y- y '; ./i 

,• "• ^' .-'■ 7 i:? "' '■" / ' 

.■'"■-•.■; V V^ ^ /,!"' 

.•;--,';•-; :=•//'. 7..- 

^ V^". ? '! S ? ". 3 ' 

'£/•:: :ii2/ ■^':' 

."' r r • - : ^ ' -/■ z- -. 

f7;£" voj? -7 r ';'t. ■ 

?.£,*?_'• 1 '?'^'rj'/Z: '' 

00032 122-600 

00033 024057 
800 3^^ 00404 6 

00035 0^405 7 

00036 e000?^ 






,s^ - /-.- /: 









^?C*^ 2,^'-:.. .SVC 



SUB 1,0 



SAVE RETlJRi^ 
SAVE AC2 
PFT *'S" 



CLE:AR SiP'M WORD 
CLEAR SLIM WORD 
GET A CHARACTER 
TEST FOR "+" 

YES 

m}M TEST FOR "-" 

WO EXPLICIT SIPJ^ 

37- r_^A- WORD FOR NEGATIVE 

•%" T' -""".F '"■ 

TT~ ATO"T--ER CHARACTER 

T^l^ IT >~ ? 

-C^' .- "'ITIT^ THTRFORE A BREAi- 



"T 0-9 BIi^ARY 



H> r-JT.:. j! PI 

ST.'*" ■i.-}?''^ 

■■-^-T-TT-^LT' BY 1 AND ADD 

.f^VT ST?' 






/- .'. /-o - 



e;-'T- 



5s 



J RESULT TO ACl 

I TEST SIG^ 

I POSITIVE 

f METATIVE 

I RESTORE AC2 



I ROUTINE TO MULTIPLY AC! BY 10 AND ADD AC0 



^■' ."■■'. i. f 

1 M : V '4 



EC50S 



JWP Q, 3 



# 


i\i#g 




J 


M*4 




J 


N*5 




1 


M*5*2 = 


M* 10 


9 


ADD AC0 




i 


SUCCESS 


R ': T ■ i 



00054 0i00«0 .ECCI2; 

00055 00000« .EC0 35 



::::?! ^^ 


;^ ^ ■- -:i '1 


^ p --^ * f/' -4 





•a >. ^.- 5 7 


i'6 I'} J'' ■'■, ■;,' ' ,*■ 


t;> ' ! <» 





.;- f^.': X Ti 


.,-'7';.-; f;-:> 


r- --1 ^j--. , 


«+ 


e-r!f -■'- 


0C':v:55 


_, „, ^, i ^ 


f !• „ 


i5 3-2 


?7ir:5- 


.~-':22! 


"0 


?.■• .'y ri fc 3 


^-^7- ; 


«? ■' C 2 3 ^ 


• »Q 


3^?' ', -^ 


>7; ?••''''. ^3 


a ~ G I •■ " 


i»S 



000040 *EC40=40 

000041 .EC4l=41 



SAVE AC2 
SAVE AC 3 



FL3 3 ■-:. 3:1 FOR SIGN OF RESULT 
33 -3 i ■-.•'-■■ 31JM WORD 



3 331 1 
3 3C: i 

3SC ■ ^ 



> 

^3 ' FOR IN3: 3A' 



A--j"-^3 3S 3F GET CHARACTER 

3C .: " ■ ■ 3 

-l3'-l'--3 DF PUT CHARACTE3 



